0 PRINT"[147]";:
1 POKE53272,29
10 A=7169
20 B=14:C=2
21 IFB=12THENC=3
30 FORI=0TO3
40 FORX=0TOC
50 POKE1024+I*40+X,PEEK((A+B*3)+I*256+X)
60 NEXTX
70 NEXTI
80 C=2:GETA$:ON-(A$="")GOTO80
90 IFA$="+"THENB=B+1:PRINT"[147]";:GOTO21